home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 5 (Internal Edition) / Apple R&P Lib Internal v5.0.iso / 6-Developer Demos / Developer Demos-Ed. / Macintosh School® CD-ROM Demo / Macintosh SchoolÆ CD-ROM Demo / card_65655.txt < prev    next >
Text File  |  1990-08-14  |  1KB  |  69 lines

  1. -- card: 65655 from stack: in
  2. -- bmap block id: 96651
  3. -- flags: 4000
  4. -- background id: 114030
  5. -- name: Finished Attendance Report
  6. ----- HyperTalk script -----
  7. on openCard
  8.   put the short date into card field date
  9. end openCard
  10.  
  11.  
  12. -- part 1 (button)
  13. -- low flags: 00
  14. -- high flags: 0000
  15. -- rect: left=0 top=0 right=342 bottom=512
  16. -- title width / last selected line: 0
  17. -- icon id / first selected line: 0 / 0
  18. -- text alignment: 1
  19. -- font id: 0
  20. -- text size: 12
  21. -- style flags: 0
  22. -- line height: 16
  23. -- part name: 
  24.  
  25.  
  26. -- part 2 (button)
  27. -- low flags: 00
  28. -- high flags: 0000
  29. -- rect: left=11 top=23 right=38 bottom=26
  30. -- title width / last selected line: 0
  31. -- icon id / first selected line: 5068 / 5068
  32. -- text alignment: 1
  33. -- font id: 0
  34. -- text size: 12
  35. -- style flags: 0
  36. -- line height: 16
  37. -- part name: Close
  38. ----- HyperTalk script -----
  39. on mouseDown
  40.   set icon of me to "Close Box Hi"
  41. end mouseDown
  42.  
  43. on mouseLeave
  44.   set icon of me to "Close Box"
  45. end mouseLeave
  46.  
  47. on mouseUp
  48.   set icon of me to "Close Box"
  49.   go back
  50. end mouseUp
  51.  
  52.  
  53. -- part 3 (field)
  54. -- low flags: 01
  55. -- high flags: 0000
  56. -- rect: left=10 top=81 right=98 bottom=82
  57. -- title width / last selected line: 0
  58. -- icon id / first selected line: 0 / 0
  59. -- text alignment: 0
  60. -- font id: 3
  61. -- text size: 12
  62. -- style flags: 0
  63. -- line height: 16
  64. -- part name: Date
  65.  
  66.  
  67. -- part contents for card part 3
  68. ----- text -----
  69. 8/28/89